home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Frameworks / TransSkel 3.24 / Source / Positioning Stuff / SkelGetMainDevRect.c next >
Text File  |  1996-01-17  |  442b  |  21 lines
  1. /*
  2.  * Get usable area on main device.  Does not include menu bar; if that's
  3.  * of interest, do this:
  4.  *
  5.  *        SkelGetMainDeviceRect (&r);
  6.  *        r.top -= SkelQuery (skelQMBarHeight);
  7.  */
  8.  
  9. # include    "TransSkel.h"
  10.  
  11.  
  12. pascal void
  13. SkelGetMainDeviceRect (Rect *r)
  14. {
  15.     if (!SkelQuery (skelQHasColorQD))    /* no devices, use screenBits */
  16.         *r = SkelQD (screenBits.bounds);
  17.     else
  18.         *r = (**GetMainDevice ()).gdRect;
  19.     r->top += SkelQuery (skelQMBarHeight);
  20. }
  21.